home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 105 / Tiger_Disk_105_20xx_Tiger-Crew-Disk_de_Side_B.d64 / ende ii_61 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  318b  |  8 lines
  1. 1 poke53280,.:poke53281,.:printchr$(147):poke53265,80
  2. 2 s=14*rnd(1)+14   :forc=1tos :poke646,c:
  3. 3 a=6*rnd(s)+6:print"[160] [160] [160] [160] [160] [160] [160] [160] [160]      [160] [160] [160] [160] [160] [160] [160] [160] [160]";
  4. 4 forf=atos:poke53283,f
  5. 5 print"[145] [160] [160] [160][160][160][160][160]     [160]  [197][206][196][197]  [160]     [160][160][160][160][160] [160] [160] [145]":poke53284,f:next:next
  6. 6 poke56325,1:print"[151][147]lukian";:poke56325,55
  7. 7 fort=1to300:next:sys2048
  8.